www.gusucode.com > 落叶冰点万能企业网站内容管理系统 V9.1 > 落叶冰点万能企业网站内容管理系统 V9.1\code\admin\D_change_to_qiye.asp

    

<%



'**************************************************************
' 新动软网站管理系统
' 官方网站: http://www.aspcpu.com
' 系统作者: 阮丁远(网名：天下程序)
' Copyright 新动软网站管理系统 版权所有
'**************************************************************


%>





<LINK href="../css.css" type=text/css rel=stylesheet>
<%




dir_set="../"
Server.ScriptTimeout = 99999

%>


<!--#include file=../inc/conn.asp-->
<!--#include file=../inc/Functionb.asp-->

<!--#include file=../inc/ajaxLIB.asp-->

<!--#include file=inc/checkadmin1.asp-->

<!--#include file=../inc/functionFiless.asp-->




<!--#include file=../inc/ND_class_function.asp-->
<%
biao2="[ND_config]"
set rs22=server.CreateObject("adodb.recordset")
rs22.open "select top 1 * from "&biao2&" where datatype='sys_type'",conn,1,3
if rs22.eof then 
rs22.addnew



if session(nd_admin_cach_varb_name)="" then
if request.cookies(nd_admin_cach_varb_name)="" then
uuuaa=""
else
uuuaa=request.cookies(nd_admin_cach_varb_name)
end if
else
uuuaa=session(nd_admin_cach_varb_name)
end if




rs22("type")="sys_type"
rs22("data")="qiye"


rs22.update
end if

rs22.close
set rs22=nothing




set rs22=server.CreateObject("adodb.recordset")
rs22.open "select top 1 * from "&biao2&" where datatype='sys_type'",conn,1,3



rs22("data")="qiye"

rs22.update

%>

<script language="javascript">


self.location="adminKernel/D_update_now_skin_qiye_b.asp";
</script>